home *** CD-ROM | disk | FTP | other *** search
Text File | 1994-11-11 | 1.6 KB | 77 lines | [TEXT/MPS ] |
- {
- File: OSAComp.p
-
- Copyright: © 1984-1994 by Apple Computer, Inc.
- All rights reserved.
-
- Version: Universal Interfaces 2.0a3 ETO #16, MPW prerelease. Friday, November 11, 1994.
-
- Bugs?: If you find a problem with this file, send the file and version
- information (from above) and the problem description to:
-
- Internet: apple.bugs@applelink.apple.com
- AppleLink: APPLE.BUGS
-
- }
-
- {$IFC UNDEFINED UsingIncludes}
- {$SETC UsingIncludes := 0}
- {$ENDC}
-
- {$IFC NOT UsingIncludes}
- UNIT OSAComp;
- INTERFACE
- {$ENDC}
-
- {$IFC UNDEFINED __OSACOMP__}
- {$SETC __OSACOMP__ := 1}
-
- {$I+}
- {$SETC OSACompIncludes := UsingIncludes}
- {$SETC UsingIncludes := 1}
-
-
- {$IFC UNDEFINED __APPLEEVENTS__}
- {$I AppleEvents.p}
- {$ENDC}
- { Errors.p }
- { ConditionalMacros.p }
- { Types.p }
- { Memory.p }
- { MixedMode.p }
- { OSUtils.p }
- { Events.p }
- { Quickdraw.p }
- { QuickdrawText.p }
- { EPPC.p }
- { PPCToolbox.p }
- { AppleTalk.p }
- { Processes.p }
- { Files.p }
- { Notification.p }
-
- {$IFC UNDEFINED __OSA__}
- {$I OSA.p}
- {$ENDC}
- { AEObjects.p }
- { Components.p }
-
- {$PUSH}
- {$ALIGN MAC68K}
- {$LibExport+}
-
- FUNCTION OSAGetStorageType(scriptData: Handle; VAR dscType: DescType): OSErr;
- FUNCTION OSAAddStorageType(scriptData: Handle; dscType: DescType): OSErr;
- FUNCTION OSARemoveStorageType(scriptData: Handle): OSErr;
-
- {$ALIGN RESET}
- {$POP}
-
- {$SETC UsingIncludes := OSACompIncludes}
-
- {$ENDC} {__OSACOMP__}
-
- {$IFC NOT UsingIncludes}
- END.
- {$ENDC}
-